home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 2: CDPD 1 / Almathera Ten on Ten - Disc 2: CDPD 1.iso / pd / 301-325 / 325 / farprint / fartest.c < prev    next >
C/C++ Source or Header  |  1995-03-14  |  1KB  |  59 lines
  1. /* FarTest.c ****************************************************************
  2. *
  3. *    FarTest -------    Debugging functions for programs which don't
  4. *            have links to their environment.
  5. *
  6. *            FarPrint demonstration program.
  7. *
  8. *    Author --------    Olaf Barthel of MXM
  9. *            Brabeckstrasse 35
  10. *            D-3000 Hannover 71
  11. *
  12. *            Federal Republic of Germany.
  13. *
  14. *    This program truly is in the PUBLIC DOMAIN. Written on a sunny
  15. *    September day in 1989, updated 27 January 1990.
  16. *
  17. *    Compiled using Aztec C 3.6a, CygnusEd Professional 2 & ARexx.
  18. *
  19. ****************************************************************************/
  20.  
  21.     /* FarPrint.Library base pointer. */
  22.  
  23. long FarBase;
  24.  
  25.     /* main(argc,argv):
  26.      *
  27.      *    This is meant to be the main demonstration
  28.      *    part for this program.
  29.      */
  30.  
  31. void
  32. main(argc,argv)
  33. long argc;
  34. char *argv[];
  35. {
  36.     char Tempo[81];
  37.     long i;
  38.  
  39.     if(!(FarBase = OpenLibrary("farprint.library",0)))
  40.         exit(0);
  41.  
  42.         /* Send some dummy text. */
  43.  
  44.     for(i = 0 ; i < 14 ; i++)
  45.         SendText("%ld",i << i);
  46.         
  47.         /* Send the first calling argument to FarPrint. */
  48.  
  49.         /* Request a number and print it. */
  50.  
  51.     printf("%d\n",RequestNumber("FarTest"));
  52.  
  53.         /* Request a text and print it. */
  54.  
  55.     printf("%s\n",RequestString("FarTest",Tempo));
  56.  
  57.     CloseLibrary(FarBase);
  58. }
  59.